home *** CD-ROM | disk | FTP | other *** search
/ Turnbull China Bikeride / Turnbull China Bikeride - Disc 2.iso / ACORNUSERS / EMULATOR / MAGICKIT / assembler / s / throwback
Text File  |  1998-04-26  |  1KB  |  61 lines
  1.     AREA    |C$$code|, CODE, READONLY
  2.  
  3.     EXPORT    DDEUtils_ThrowbackStart
  4.     EXPORT    DDEUtils_ThrowbackSend_Processing
  5.     EXPORT    DDEUtils_ThrowbackSend_Error
  6.     EXPORT    DDEUtils_ThrowbackSend_Info
  7.     EXPORT    DDEUtils_ThrowbackEnd
  8.  
  9. DDEUtils_ThrowbackStart
  10.     stmfd    r13!, {r14}
  11.     swi    0x62587 ; XDDEUtils_ThrowbackStart
  12.     ldmfd    r13!, {pc}^
  13.  
  14. ; entry
  15. ;    r0 = pointer to nul-terminated full pathname of file being processed
  16. DDEUtils_ThrowbackSend_Processing
  17.     stmfd    r13!, {r14}
  18.     mov    r2, r0
  19.     mov    r0, #0
  20.     swi    0x62588 ; XDDEUtils_ThrowbackSend
  21.     ldmfd    r13!, {pc}^
  22.  
  23. ; entry
  24. ;    r0 = pointer to nul-terminated full pathname of file being processed
  25. ;    r1 = line number
  26. ;    r2 = severity of error
  27. ;        = 0 for warning
  28. ;        = 1 for error
  29. ;        = 2 for serious error
  30. ;    r3 = pointer to nul-terminated description of error
  31. DDEUtils_ThrowbackSend_Error
  32.     stmfd    r13!, {r4, r5, r14}
  33.     mov    r5, r3
  34.     mov    r4, r2
  35.     mov    r3, r1
  36.     mov    r2, r0
  37.     mov    r0, #1
  38.     swi    0x62588 ; XDDEUtils_ThrowbackSend
  39.     ldmfd    r13!, {r4, r5, pc}^
  40.  
  41. ; entry
  42. ;    r0 = pointer to nul-terminated full pathname of file being processed
  43. ;    r1 = line number to which 'informational' message refers
  44. ;    r2 = pointer to nul-terminated 'informational' message
  45. DDEUtils_ThrowbackSend_Info
  46.     stmfd    r13!, {r4, r5, r14}
  47.     mov    r5, r2
  48.     mov    r4, #0
  49.     mov    r3, r1
  50.     mov    r2, r0
  51.     mov    r0, #2
  52.     swi    0x62588 ; XDDEUtils_ThrowbackSend
  53.     ldmfd    r13!, {r4, r5, pc}^
  54.  
  55. DDEUtils_ThrowbackEnd
  56.     stmfd    r13!, {r14}
  57.     swi    0x62589 ; XDDEUtils_ThrowbackEnd
  58.     ldmfd    r13!, {pc}^
  59.  
  60.     END
  61.